home *** CD-ROM | disk | FTP | other *** search
/ Microsoft Interactive CD Sampler / Microsoft Interactive CD Sampler.iso / DEMOS / PICTURE / PICTURI2.DIR / 00067.ls < prev    next >
Encoding:
Text File  |  1996-09-05  |  1.3 KB  |  38 lines
  1. on mouseDown
  2.   repeat while the stillDown = 1
  3.     set the locH of sprite 20 to the mouseH
  4.     set the locV of sprite 20 to the mouseV
  5.     if rollOver(3) and (the castNum of sprite 3 = the number of member "pausebox") then
  6.       set the castNum of sprite 3 to the number of member "pausedown"
  7.     else
  8.       if rollOver(3) and (the castNum of sprite 3 = the number of member "resumenormal") then
  9.         set the castNum of sprite 3 to the number of member "resumedown"
  10.       else
  11.         if (rollOver(3) = 0) and (the castNum of sprite 3 = the number of member "pausedown") then
  12.           set the castNum of sprite 3 to the number of member "pausebox"
  13.         else
  14.           if (rollOver(3) = 0) and (the castNum of sprite 3 = the number of member "resumedown") then
  15.             set the castNum of sprite 3 to the number of member "resumenormal"
  16.           end if
  17.         end if
  18.       end if
  19.     end if
  20.     updateStage()
  21.   end repeat
  22. end
  23.  
  24. on mouseUp
  25.   global x
  26.   if rollOver(3) and (the castNum of sprite 3 = the number of member "pausedown") then
  27.     set the castNum of sprite 3 to the number of member "resumenormal"
  28.     updateStage()
  29.     set the movieRate of sprite 2 to 0
  30.     sound stop 2
  31.     set x to x + 1
  32.   else
  33.     set the castNum of sprite 3 to the number of member "pausebox"
  34.     updateStage()
  35.     go(the frame - 1)
  36.   end if
  37. end
  38.